local poke = {"Shiny Mr. Mime", 'Mew', 'Mewtwo', 'Abra', 'Kadabra', 'Alakazam', 'Drowzee', 'Hypno', 'Mr. Mime', 'Porygon', 'Shiny Abra', 'Shiny Alakazam', 

'Shiny Hypno', 'Porygon2'}  --alterado v2.9

local etele = 9499

local cdtele = 0

local config = {

premium = true, -- se precisa ser premium account (true or false)

battle = false    -- se precisa estar sem battle (true). Se colocar false, poderá usar teleport no meio de batalhas

}

local places = {

[1] = {name = "Saffron", id = 1, sto = 897530},

[2] = {name = "Cerulean", id = 2, sto = 897531},

[3] = {name = "Lavender", id = 3, sto = 897532},

[4] = {name = "Fuchsia", id = 4, sto = 897533},

[5] = {name = "Celadon", id = 5, sto = 897534},

[6] = {name = "Viridian", id = 9, sto = 897535}, --alterado v1.7

[7] = {name = "Vermilion", id = 22, sto = 897536},

[8] = {name = "Pewter", id = 8, sto = 897537}, 

[9] = {name = "Cinnabar", id = 11, sto = 897538},

[10] = {name = "Hunter Village", id = 14, sto = 897539},

[11] = {name = "Sunshine", id = 15, sto = 897540},

[12] = {name = "Orre", id = 17, sto = 897541},

[13] = {name = "LaRosse", id = 18, sto = 897542},

[14] = {name = "Canavale", id = 19, sto = 897543},

[15] = {name = "Battle City", id = 31, sto = 897544},

[16] = {name = "Pallet", id = 10, sto = 897545},

[17] = {name = "Singer", id = 12, sto = 897546},

}

function onSay(cid, words, param)

    if #getCreatureSummons(cid) == 0 then

        doPlayerSendCancel(cid, "You need a pokemon to use teleport.")

    return true

    end

    if not isInArray(poke, getCreatureName(getCreatureSummons(cid)[1])) then

    return 0

    end

    

    if getPlayerStorageValue(cid, Agatha.stoIni) >= 1 and getPlayerStorageValue(cid, Agatha.stoIni) < 50 then --alterado v2.9

       doPlayerSendCancel(cid, "You can't do that here!")

    return true

    end 

    

    if getPlayerStorageValue(cid, 22545) == 1 then      --golden arena

       doPlayerSendCancel(cid, "You can't do that while the golden arena!")

    return true

    end

    

    if getPlayerStorageValue(cid, 212124) >= 1 then         --alterado v2.6

       return doPlayerSendCancel(cid, "You can't do it with a pokemon with mind controlled!")

    end

    if getPlayerStorageValue(cid, 52480) >= 1 then

       return doPlayerSendCancel(cid, "You can't do it while a duel!")  --alterado v2.6

    end

    

    if getPlayerStorageValue(cid, 6598754) == 1 or getPlayerStorageValue(cid, 6598755) == 1 then 

       return doPlayerSendCancel(cid, "You can't do it while in the PVP Zone!")   --alterado v2.7

    end

    

    if exhaustion.get(cid, etele) and exhaustion.get(cid, etele) > 0 then

        local tempo = tonumber(exhaustion.get(cid, etele)) or 0

        local min = math.floor(tempo)

        doPlayerSendCancel(cid, "Your pokemon is tired, wait "..getStringmytempo(tempo).." to teleport again.")

    return true

    end

    if config.premium and not isPremium(cid) then

        doPlayerSendCancel(cid, "Você Não E Premium Account.")

    return true

    end

    if config.battle and getCreatureCondition(cid, CONDITION_INFIGHT) then

        doPlayerSendCancel(cid, "Your pokemon can't concentrate during battles.")

    return true

    end

    if (param == '') then

        local str = ""

        str = str .. "Places to go :\n\nHouse\n"

            for a = 1, #places do

                str = str..""..places[a].name.."\n"

            end

        doShowTextDialog(cid, 7416, str)

    return true

    end

    local item = getPlayerSlotItem(cid,

    local nome = getPokeballName(item.uid)

    local summon = getCreatureSummons(cid)[1]

    local lastppos = getThingPos(cid)

    local lastspos = getThingPos(summon)

    local telepos = {}

    local myplace = ""

    local townid = 0

    local citySto = 0  --alterado v2.7

    if string.lower(param) == "house" then

        if not getHouseByPlayerGUID(getPlayerGUID(cid)) then

            doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You don't own a house.")

        return true

        end

        telepos = getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid)))

        myplace = "our home"

    else

        for x = 1, #places do

            if string.find(string.lower(places[x].name), string.lower(param)) then

                townid = places[x].id

                myplace = places[x].name

                citySto = places[x].sto or -1  --alterado v2.7

            end

        end

        if myplace == "" then

            doPlayerSendCancel(cid, "That place doesn't exist.")

        return true

        end

    end

    if myplace ~= "" and townid > 0 then

        telepos = getTownTemplePosition(townid)

    end

    

    if getDistanceBetween(getThingPos(cid), telepos) <= 15 then

        doPlayerSendCancel(cid, "You are too near to the place you want to go!")

    return true

    end

    doSendMagicEffect(getThingPos(summon), 29)

    doSendMagicEffect(getThingPos(cid), 29)

    doTeleportThing(cid, telepos, false)

    local pos2 = getClosestFreeTile(cid, getPosByDir(getThingPos(cid), SOUTH))

    doTeleportThing(summon, pos2, false)

    doSendMagicEffect(getThingPos(cid), 29)

    doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1)

    doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1, false, 0, lastppos)

    doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER)

    doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER, false, 0, lastspos)

    doCreatureSetLookDir(cid, SOUTH)

    doCreatureSetLookDir(summon, SOUTH)

    doSendMagicEffect(getThingPos(summon), CONST_ME_TELEPORT)

    exhaustion.set(cid, etele, cdtele)

return true

end